version 8.2
#delimit;
set more off;
log using boehmke2005prq.log, replace;

/*	************************************************************	*/
/* 	Author:		Frederick J. Boehmke				*/
/*	Date:		June 30, 2005					*/
/*      File:		boehmke2005prq.do				*/
/*	Purpose:	Replicate models in boehmke2005prq.pdf studying	*/
/*			effect of interest groups on the frequency of	*/
/*			statewide initiatives, 1976-2000.		*/
/*      Input File:	boehmke2005prq.dta				*/
/*      Output File:	boehmke2005prq.log, boehmke2005prq-table.out	*/
/*      Requires:	outreg add-on for Stata (otherwise comment out	*/
/*			or type net search outreg in Stata to install).	*/
/*	************************************************************	*/

use boehmke2005prq;

nbreg ballot citizen econ statinit consinit statcons sigs unlimit circdays singlesu 
	distribu primaryo repgov repleg ideology legprof time minordiv deficit, 
	noconstant cluster(stateno);

  outreg using boehmke2005prq-table, coefastr se 3aster replace;

xtpois ballot citizen econ statinit consinit statcons sigs unlimit circdays singlesu 
	distribu primaryo repgov repleg ideology legprof time minordiv deficit, 
	noconstant re i(stateno);

  outreg using boehmke2005prq-table, coefastr se 3aster append;

tabstat ballot statinit consinit statcons sigs unlimit circdays singlesu distribu primaryo 
	repgov repleg ideology econ citizen  legprof time minordiv deficit 
	if e(sample), stats(mean sd min max) col(stats) format (%5.3f);

log close;
clear;
exit;